home *** CD-ROM | disk | FTP | other *** search

---

/ Developer Source 7 / developer source - volume 7.iso / parad / jul95 / kada1f6.gif

< prev

next >

Graphics Interchange Format  |  1996-11-18  |  8KB  |  419x418  |  4-bit (5 colors)

Labels: text | electronics | screenshot | display | software | number | computer
OCR: SIMUL.FSL :: pbWindow :: mouseRightUp method mouseRightUp(var eventInfo MouseEvent) var aChoice String sId SmallInt endVar aChoice = 1popWindow. show( ) switch case aChoice = "&Tile" : SId = MenuWindowTile case aChoice = "&Cascade" : SId = MenuWindowCascade case aChoice = "Arrange &Icons" : SId = MenuWindowArrange Icons case aChoice = "Close &All" : SId = MenuWindowCloseAll otherwise : return endSwitch menuAction (sId) endmethod Edit Line: 1 Col: 1

---